home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Developer Source 11
/
developer source - volume 11.iso
/
parad
/
jun96
/
conef104.gif
< prev
next >
Tile
Graphics Interchange Format
|
1998-02-10
|
7.8 KB
|
514x406
|
4-bit (5 colors)
ocr:
NOISY.FSL-RadioBtn.spushButon method pushButton(uar eventinfo Event) var sndLoop, sndAsync Smallint enduar sndLoop - SND LOOP sndAsync = SND ASYNC if self.value = False then if sndPlaySound("chimes.wau", sndAsync.bitOR(sndLoop)) = FALSE then nessageC"ERRUR: Problem playing waverorm") endif theText = "Stop Sound" else sndPlaySound("chimes.wau", SND ASYNC) theText = "Start Sound" endif endmethod Edit Line: 1 Col: 1